home *** CD-ROM | disk | FTP | other *** search
/ Pascal Super Library / Pascal Super Library (CW International)(1997).bin / SYS_INFO / TP6UTIL / CPUCHK.PAS next >
Pascal/Delphi Source File  |  1990-11-04  |  258b  |  21 lines
  1. Unit CPUChk;
  2.  
  3. interface
  4.  
  5. implementation
  6.  
  7. label
  8.   CpuOK;
  9. begin
  10.  Asm
  11.     PUSH    SP
  12.     POP     BX
  13.     CMP     BX,SP
  14.     JE      CPUOk
  15.  end;
  16.    Writeln('An 80286 or later CPU is required for this program');
  17.    RunError(215);
  18.  CPUOk:
  19. end.
  20.  
  21.